<?php

/**
 * Implementation of Devel module's hook_content_generate().
 *
 * Included only when needed.
 */
function _date_content_generate($node, $field) {
    include_once('./' . drupal_get_path('module', 'date_api') . '/date_api_elements.inc');

    $node_field = array();
    if (isset($field['widget']['year_range'])) {
        $split = explode(':', $field['widget']['year_range']);
        $back = str_replace('-', '', $split[0]);
        $forward = str_replace('+', '', $split[1]);
    } else {
        $back = 2;
        $forward = 2;
    }
    // Pick a random year within the time range,
    // and a random second within that year.
    $year = date_format(date_now(), 'Y') - $back + mt_rand(0, ($forward + $back));
    $start = date_make_date($year . '-01-01 00:00:00', date_get_timezone_db($field['tz_handling']));
    $leap = date_format($start, 'L');
    $max_days = $leap ? 366 : 365;
    $seconds = mt_rand(0, ($max_days * 86400));
    date_modify($start, "+$seconds seconds");
    $increment = $field['widget']['increment'];
    date_increment_round($start, $increment);

    // Modify To date by 1 hour to 3 days, shorter for repeating dates
    // longer for others.
    $start2 = drupal_clone($start);
    $max = !empty($field['repeat']) ? 720 : 4320;
    $max = 240;
    date_modify($start2, '+' . mt_rand(60, $max) . ' minutes');
    date_increment_round($start2, $increment);

    if ($field['tz_handling'] == 'date') {
        // Choose a random timezone.
        // Not all keys exist, so we have to check.
        $timezones = array_keys(date_timezone_names(TRUE));
        $key = mt_rand(0, count($timezones) - 1);
        if (!array_key_exists($key, $timezones)) {
            $timezone = date_default_timezone_name();
        } else {
            $timezone = $timezones[$key];
        }
    } else {
        $timezone = date_get_timezone($field['tz_handling']);
    }

    switch ($field['type']) {
        case 'date':
            $format = DATE_FORMAT_ISO;
            break;
        case 'datestamp':
            $format = DATE_FORMAT_UNIX;
            break;
        case 'datetime':
            $format = DATE_FORMAT_DATETIME;
            break;
    }
    $node_field['value'] = date_format($start, $format);
    if ($field['todate']) {
        $node_field['value2'] = date_format($start2, $format);
    }
    date_timezone_set($start, timezone_open($timezone));
    $node_field['timezone'] = $timezone;
    $node_field['offset'] = date_offset_get($start);
    date_timezone_set($start2, timezone_open($timezone));
    $node_field['offset2'] = date_offset_get($start2);

    if (!empty($field['repeat'])) {
        include_once('./' . drupal_get_path('module', 'date_repeat') . '/date_repeat_calc.inc');
        include_once('./' . drupal_get_path('module', 'date') . '/date_repeat.inc');
        include_once('./' . drupal_get_path('module', 'date_api') . '/date_api_ical.inc');

        // Create a repeating date.
        $duration = date_difference($start, $start2);
        $form_values = array();

        // Create the default case more frequently than case 1 or 2.
        $which = mt_rand(0, 10);
        $max_items = 10;
        $intervals = array_keys(INTERVAL_options());
        unset($intervals[0]);
        $interval = $intervals[mt_rand(1, 3)];
        switch ($which) {
            case 1:
                $mo = mt_rand(1, 28);
                $options = array('YEARLY', 'MONTHLY');
                $freq = date_content_generate_key($options);
                $freq = $options[$freq];
                $form_values['FREQ'] = $freq;
                // Make sure we'll find a match in our range.
                if ($freq == 'YEARLY') {
                    $interval = 1;
                }
                $form_values['BYMONTHDAY'] = array($mo);
                break;
            case 2:
                $mo = mt_rand(1, 12);
                $options = array('YEARLY', 'MONTHLY');
                $freq = date_content_generate_key($options);
                $freq = $options[$freq];
                $form_values['FREQ'] = $freq;
                // Make sure we'll find a match in our range.
                if ($freq == 'YEARLY') {
                    $interval = 1;
                }
                $form_values['BYMONTH'] = array($mo);
                break;
            default:
                $dows = array_keys(date_content_repeat_dow_options());
                $day = date_content_generate_key($dows);
                $dow = $dows[$day];
                $options = array('MONTHLY', 'DAILY', 'WEEKLY');
                $freq = date_content_generate_key($options);
                $freq = $options[$freq];
                $form_values['FREQ'] = $freq;
                $form_values['BYDAY'] = array($dow);
                break;
        }

        $form_values['INTERVAL'] = $interval;

        switch ($freq) {
            case 'YEARLY':
                $period = 'year';
                break;
            case 'MONTHLY':
                $period = 'month';
                break;
            case 'WEEKLY':
                $period = 'week';
                break;
            default:
                $period = 'day';
                break;
        }
        date_modify($start2, '+' . max(1, $forward) . ' years');
        date_increment_round($start2, $increment);
        $until = date_format($start2, 'Y-m-d H:i:s');
        $form_values['UNTIL'] = array('datetime' => $until, 'tz' => 'UTC');
        $form_values['COUNT'] = $max_items;

        $rrule = date_api_ical_build_rrule($form_values);
        $values = date_repeat_build_dates($rrule, $form_values, $field, $node_field);

        $start = $node_field;
        $node_field = array(0 => $start);
        $node_field[0]['rrule'] = $rrule;
        $node_field += $values;
    }
    return $node_field;
}

function date_content_generate_key($array) {
    $keys = array_keys($array);
    $min = array_shift($keys);
    $max = array_pop($keys);
    return mt_rand($min, $max);
}

/**
 * Helper function for BYDAY options.
 *
 * Creates options like -1SU and 2TU
 * Omit options that won't find many matches, like 5th Sunday.
 */
function date_content_repeat_dow_options() {
    $options = array();
    foreach (date_repeat_dow_count_options() as $count_key => $count_value) {
        foreach (date_repeat_dow_day_options() as $dow_key => $dow_value) {
            if ($count_key != 5 && $count_key != -5) {
                $options[$count_key . $dow_key] = $count_value . ' ' . $dow_value;
            }
        }
    }
    return $options;
}